home *** CD-ROM | disk | FTP | other *** search
/ Aminet 48 / Aminet 48 (2002)(GTI - Schatztruhe)[!][Apr 2002].iso / Aminet / util / arc / xadmaster000.lha / xad / Install < prev    next >
Encoding:
Text File  |  2002-01-02  |  1.8 KB  |  102 lines
  1. ; little dirty install script for xadmaster system
  2.  
  3. ; $VER: Install 1.4 (22.11.2001) by SDI
  4.  
  5. (copylib
  6.   (help @copylib-help)
  7.   (prompt "Copying xadmaster.library")
  8.   (source "Libs/xadmaster.library")
  9.   (dest "LIBS:")
  10.   (confirm)
  11. )
  12.  
  13. (delete (cat "LIBS:xfd/("
  14.         "NiteTimeGamesDos|Trackmo-DOS|SensiDisk|GameDemoFS|SOS|Cpio)")
  15.     (prompt "Deleting old slaves that are no longer required")
  16.     (help "These slaves are either included in xadmaster.library or in another client\n\n"
  17.     @delete-help)
  18.     (optional "force")
  19. )
  20.  
  21. (copyfiles
  22.   (help @copyfiles-help)
  23.   (prompt "Copying xadmaster.library clients")
  24.   (source "Libs/xad")
  25.   (dest "LIBS:xad")
  26.   (all)
  27.   (confirm)
  28. )
  29.  
  30. (copyfiles
  31.   (help @copyfiles-help)
  32.   (prompt "Copying shell tools")
  33.   (source "C")
  34.   (dest "C:")
  35.   (all)
  36.   (confirm)
  37. )
  38.  
  39. (set #dir
  40.   (askdir
  41.     (prompt "Where should the docs be installed?")
  42.     (help @askdir-help)
  43.     (default @default-dest)
  44.   )
  45. )
  46.  
  47. (set #catalog
  48.   (askchoice
  49.     (prompt "Select the language")
  50.     (help @askoptions-help)
  51.     (choices "deutsch" "english" "français" )
  52.     (default 1)
  53.   )
  54. )
  55.  
  56. (if (= #catalog 0) (
  57.   (copyfiles
  58.     (help @copyfiles-help)
  59.     (prompt "Copying xadmaster guide file and shell docs")
  60.     (source "Languages/deutsch")
  61.     (dest #dir)
  62.     (infos)
  63.     (all)
  64.     (confirm)
  65.   )
  66. ))
  67.  
  68. (if (= #catalog 1) (
  69.   (copyfiles
  70.     (help @copyfiles-help)
  71.     (prompt "Copying xadmaster guide file")
  72.     (source "xadmaster.guide")
  73.     (dest #dir)
  74.     (infos)
  75.     (all)
  76.     (confirm)
  77.   )
  78.  
  79.   (copyfiles
  80.     (help @copyfiles-help)
  81.     (prompt "Copying shell tool docs")
  82.     (source "Docs")
  83.     (dest #dir)
  84.     (infos)
  85.     (all)
  86.     (confirm)
  87.   )
  88. ))
  89.  
  90. (if (= #catalog 2) (
  91.   (copyfiles
  92.     (help @copyfiles-help)
  93.     (prompt "Copying xadmaster guide file and shell docs")
  94.     (source "Languages/français")
  95.     (dest #dir)
  96.     (infos)
  97.     (all)
  98.     (confirm)
  99.   )
  100. ))
  101.  
  102.